home *** CD-ROM | disk | FTP | other *** search
/ Joystick Magazine 1996 May / cd joy 71No13.iso / pc / demos / eurosoc / source / euro_rnd.cpp < prev    next >
C/C++ Source or Header  |  1996-03-14  |  2KB  |  67 lines
  1. #include <stdlib.h>
  2. #include "eurodefs.h"
  3. #include "euro_fxd.h"
  4. #include "euro.equ"
  5. #include "euro_sym.h"
  6. #include "euro_def.h"
  7. #include "euro_var.h"
  8.  
  9. //********************************************************************************************************************************
  10.  
  11.         //…ÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕª 
  12.         //∫                                                                        ∫
  13.         //∫ Random number method 1 -> originates from Mike Hart, slightly modified ∫
  14.         //∫                                                                        ∫
  15.         //»ÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕº 
  16.     
  17. short GetRnd1()
  18.     {
  19.         long rnd = EUROseed1;
  20.  
  21.         if ( rnd == 0 )
  22.             rnd = 0x024272;
  23.         if ( rnd > 2147483648 )
  24.         {
  25.             rnd+= rnd;        
  26.             rnd^= 0x01d872b45;
  27.         }            
  28.     
  29.         else
  30.             rnd+= rnd;        
  31.  
  32.         EUROseed1 = rnd+7;
  33.         return( (short)EUROseed1 );
  34.     }
  35.  
  36. //********************************************************************************************************************************
  37.  
  38.         //…ÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕª 
  39.         //∫                      ∫
  40.         //∫ Watcom Random number ∫
  41.         //∫                                                             ∫
  42.         //»ÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕº 
  43.     
  44. unsigned short GetRnd2()
  45.     {
  46.         return((short)rand());
  47.     }
  48.  
  49. //********************************************************************************************************************************
  50.  
  51.         //…ÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕª 
  52.         //∫                                                             ∫
  53.         //∫ Random number method 3 -> originates from Zool GameGear Z80 ∫
  54.         //∫                                                             ∫
  55.         //»ÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕº 
  56.     
  57. unsigned short GetRnd3()
  58.     {
  59.         short    t2 = EUROseed3*32;
  60.         short    t3 = (EUROseed3*16)-EUROseed3;
  61.         t3       = ((((( t3-t2 ) *8 )+EUROseed3)*4)+EUROseed3)+0x01d872b45;        
  62.         EUROseed3  = t3;
  63.         return(t3);
  64.     }
  65.  
  66. //********************************************************************************************************************************
  67.